(archive-tmpdir): Use temporary-file-directory.

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index d365e59c26ddb213010a52c65b049f5ac762c16e..fc5497d6faf8d100c80be8192a045aeeb7f120d2 100644 (file)
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -122,7 +122,7 @@
 (defcustom archive-tmpdir
   (make-temp-name
    (expand-file-name (if (eq system-type 'ms-dos) "ar" "archive.tmp")
-                    system-tmp-directory))
+                    temporary-file-directory))
   "*Directory for temporary files made by arc-mode.el"
   :type 'directory
   :group 'archive)